COBOL (Common Business-Oriented Language) ভাষাটি মূলত ব্যবসায়িক এবং প্রশাসনিক অ্যাপ্লিকেশনগুলির জন্য ডিজাইন করা হয়েছিল এবং এতে রিপোর্ট জেনারেশন একটি গুরুত্বপূর্ণ ফিচার হিসেবে ব্যবহৃত হয়। COBOL-এ নিয়মিত রিপোর্ট জেনারেশন কার্যক্রমে ডেটার সঠিক বিশ্লেষণ এবং প্রদর্শনের জন্য বিভিন্ন ফাইলের মধ্যে তথ্য সংগ্রহ, প্রক্রিয়া এবং সাজানো হয়।
COBOL এ রিপোর্ট তৈরির প্রক্রিয়া সাধারণত প্রসেসিং (প্রোডাকশন রিপোর্ট, পে-রোল রিপোর্ট, বিক্রয় রিপোর্ট ইত্যাদি) এবং ফর্ম্যাটিং (কিভাবে তথ্য প্রদর্শন করা হবে) এর মধ্যে ভাগ করা হয়।
COBOL প্রোগ্রামে রিপোর্ট তৈরি করার জন্য প্রথমেই FILE SECTION এ রিপোর্ট ফাইলের গঠন বা ডেটা স্ট্রাকচার ডিফাইন করতে হয়। এর মধ্যে রিপোর্টের জন্য বিভিন্ন ডেটা এবং কলামের বিন্যাস থাকে।
FILE-CONTROL.
SELECT REPORT-FILE ASSIGN TO 'REPORT.TXT'
ORGANIZATION IS LINE SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD REPORT-FILE.
01 REPORT-REC.
05 REPORT-NAME PIC X(30).
05 REPORT-AGE PIC 99.
05 REPORT-SALARY PIC 9(5)V99.
এখানে, REPORT-FILE নামে একটি ফাইল তৈরি করা হয়েছে যেখানে রিপোর্টের ডেটা থাকবে। ফাইলের মধ্যে REPORT-NAME, REPORT-AGE, এবং REPORT-SALARY এর মতো কলাম ডিফাইন করা হয়েছে।
COBOL-এ WRITE স্টেটমেন্ট ব্যবহার করে ফাইলে ডেটা লিখতে হয়, আর REWRITE স্টেটমেন্ট ব্যবহৃত হয় পূর্বে লেখা রেকর্ডকে আপডেট করতে। সাধারণত রিপোর্ট তৈরির ক্ষেত্রে WRITE স্টেটমেন্ট ব্যবহার করা হয়।
OPEN OUTPUT REPORT-FILE.
WRITE REPORT-REC FROM EMPLOYEE-REC.
CLOSE REPORT-FILE.
এখানে, EMPLOYEE-REC থেকে ডেটা REPORT-REC এ লিখে REPORT-FILE এ সেভ করা হচ্ছে।
OPEN I/O REPORT-FILE.
READ REPORT-FILE INTO REPORT-REC
INVALID KEY
DISPLAY 'No record found.'
NOT INVALID KEY
MOVE 'Updated Name' TO REPORT-NAME
REWRITE REPORT-REC
END-READ.
CLOSE REPORT-FILE.
এখানে, REPORT-FILE থেকে রেকর্ড পড়ে সেটি REWRITE করা হচ্ছে।
COBOL-এ রিপোর্ট তৈরির সময় প্রায়ই পরিসংখ্যান যেমন মোট বিক্রয়, গড় বেতন ইত্যাদি গণনা করা হয়। এই গণনা করতে SUM, AVERAGE, COUNT ইত্যাদি ফাংশন ব্যবহার করা হয়।
01 TOTAL-SALARY PIC 9(7)V99 VALUE 0.
01 AVERAGE-SALARY PIC 9(5)V99 VALUE 0.
01 EMPLOYEE-COUNT PIC 9(3) VALUE 0.
PERFORM VARYING I FROM 1 BY 1 UNTIL I > NUM-EMPLOYEES
ADD EMPLOYEE-SALARY TO TOTAL-SALARY
ADD 1 TO EMPLOYEE-COUNT
END-PERFORM.
COMPUTE AVERAGE-SALARY = TOTAL-SALARY / EMPLOYEE-COUNT.
DISPLAY 'Total Salary: ' TOTAL-SALARY
DISPLAY 'Average Salary: ' AVERAGE-SALARY
এখানে, TOTAL-SALARY এবং AVERAGE-SALARY হিসাব করা হচ্ছে সমস্ত কর্মচারীর বেতন থেকে। EMPLOYEE-COUNT ব্যবহার করা হচ্ছে কর্মচারীদের সংখ্যা গননা করতে।
COBOL-এ রিপোর্টে ডেটা ফরম্যাট করার জন্য JUSTIFY, STRING, UNSTRING ইত্যাদি ফাংশন ব্যবহৃত হয়। রিপোর্টের আউটপুটকে সুন্দরভাবে প্রদর্শন করতে PICTURE ক্লজ ব্যবহৃত হয়।
01 FULL-NAME PIC X(50).
01 FIRST-NAME PIC X(25).
01 LAST-NAME PIC X(25).
MOVE 'John' TO FIRST-NAME.
MOVE 'Doe' TO LAST-NAME.
STRING FIRST-NAME DELIMITED BY SPACE
LAST-NAME DELIMITED BY SPACE
INTO FULL-NAME.
DISPLAY FULL-NAME.
এখানে, STRING স্টেটমেন্ট ব্যবহার করে FIRST-NAME এবং LAST-NAME একত্রে যোগ করা হয়েছে FULL-NAME এ। JUSTIFY ফাংশন ব্যবহার করলে ডেটা সঠিকভাবে সজ্জিত হয়।
প্রায়ই COBOL প্রোগ্রামে রিপোর্টের নকশা এবং আউটপুট ফরম্যাটের জন্য HEADER, FOOTER, DETAILS ইত্যাদি অংশ ব্যবহৃত হয়। এটি রিপোর্টের জন্য একটি সুনির্দিষ্ট কাঠামো তৈরি করে, যেখানে প্রতি পৃষ্ঠার শিরোনাম, শেষের তথ্য এবং ডেটার সারণি থাকে।
OPEN OUTPUT REPORT-FILE.
WRITE HEADER-REC.
PERFORM VARYING I FROM 1 BY 1 UNTIL I > NUM-EMPLOYEES
WRITE DETAIL-REC FROM EMPLOYEE-REC
END-PERFORM.
WRITE FOOTER-REC.
CLOSE REPORT-FILE.
এখানে, HEADER-REC এবং FOOTER-REC ব্যবহার করা হয়েছে রিপোর্টের শুরু এবং শেষের জন্য।
COBOL প্রোগ্রামে নিয়মিত রিপোর্ট জেনারেশন একটি গুরুত্বপূর্ণ কাজ যা ডেটা সংগৃহীত এবং বিশ্লেষণ করা সহজ করে। রিপোর্ট তৈরির জন্য FILE SECTION এ ফাইল ডিফিনিশন, WRITE এবং REWRITE স্টেটমেন্ট ব্যবহার করে ডেটা ফাইলে লেখা হয় এবং SUM, AVERAGE ইত্যাদি ব্যবহার করে গণনা করা হয়। এছাড়াও, STRING, JUSTIFY ইত্যাদি ফাংশন ব্যবহার করে ডেটা ফরম্যাট করা হয় এবং HEADER, FOOTER ইত্যাদি দিয়ে রিপোর্টের কাঠামো তৈরি করা হয়। COBOL এ রিপোর্ট জেনারেশন অনেক ব্যাপকভাবে ব্যবহৃত হয় ব্যবসায়িক প্রক্রিয়াগুলিতে, যেমন পে-রোল রিপোর্ট, ফাইনান্সিয়াল রিপোর্ট, ইত্যাদি।
common.read_more